﻿' <summary>
' BeeWit IDE Entorno de desarrollo Visual para php.
' BeeWitPHP IDE es el único entorno de desarrollo para PHP 
' de tipo WYSIWYG (What You See Is What You Get). 
' ¡Ahora si!, aproveche la potencia del lenguaje PHP 
' y desarrolle más rápidamente gracias a la programación 
' intuitiva de BeeWit.
' Copyright © 2010 Dewins Murillo Garcia 
' EMAIL: dewinsmg@gmail.com
' EMAIL: dewins@beewitsoft.com
' Este Programa es Software Libre: usted puede redistribuirlo 
' y/o modificarlo bajo los términos de la Licencia Publica General 
' GNU como es publicada por la Fundacion de Software Libre; 
' en la 3ra versión de la licencia.
' Este programa es distribuido con la esperanza de que sea útil, 
' pero SIN GARANTÍA ALGUNA; sin siquiera la garantía implícita 
' de VALOR COMERCIAL o FORMADO PARA UN PROPÓSITO EN PARTICULAR. 
' Vea la Licencia Publica General GNU para mas detalles.
' Usted debe haber recibido una copia de la Licencia Publica General 
' GNU junto con este programa. Si no, vaya a http://www.beewitsoft.com
' o en http://code.google.com/p/ajax-beewit-php-ide/
' </summary>
' <remarks></remarks>

Public Class frmBeeWit

    Public Sub New()

        ' Llamada necesaria para el Diseñador de Windows Forms.
        InitializeComponent()

        ' Agregue cualquier inicialización después de la llamada a InitializeComponent().
        Object_Language = New clsLanguage
        Object_Icons = New clsImages
        Object_OpenedProjects = New clsOpenedProjects
        Object_LocalFiles = New clsLocalFiles
        Object_Expression = New clsRegExpr
        Object_PhpFunctions = New clsPhpFunctions
        Object_Tags = New clsTags
        TempDir = Application.StartupPath & "\tmp\"
        Me.Text = Object_Language.Lang_Text("Welcome to BeeWit (AJAX PHP IDE)")
    End Sub



    Private Sub frmBeeWit_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Activated
        BeeWitFocused = True
        General.Control_Menu = Me.CtlMenu1
    End Sub

    Private Sub frmBeeWit_Deactivate(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Deactivate
        BeeWitFocused = False
    End Sub

    Private Sub frmBeeWit_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
        End
    End Sub


    Private Sub frmKotorito_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Control_Main = Me.CtlMain1
        Control_Main.AddBegin()
        Control_OpenedProjects.LoadOpenedProjects()
        Me.Location = New System.Drawing.Point(0, 0)
    End Sub

    Private Sub frmBeeWit_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.LostFocus
        BeeWitFocused = False
    End Sub
End Class